home *** CD-ROM | disk | FTP | other *** search
/ Die Speccy' 97 / Die Speccy' 97.iso / amiga_system / the_aminet / comm / mail / netmail_13.lha / NetMail / Drivers / LocalEcho.encoder < prev    next >
Text File  |  1995-07-31  |  534b  |  28 lines
  1. /*
  2. ** $VER: LocalEcho.encoder 1.2 (31.7.95)
  3. ** Copyright (c) 1995 Riccardo Solmi
  4. **
  5. */
  6.  
  7. OPTIONS RESULTS
  8. OPTIONS FAILAT 21
  9.  
  10. IF UPPER(ARG(1)) = 'INFO' THEN RETURN 'UUencode Base64 Quoted-Printable'
  11.  
  12. SELECT
  13.    WHEN UPPER(ARG(1)) = 'ENCODE' THEN DO
  14.       PARSE ARG , from, to, format
  15.  
  16.       ECHO 'ENCODE "'from'", "'to'", "'format'"'
  17.       RETURN 2
  18.    END
  19.    WHEN UPPER(ARG(1)) = 'DECODE' THEN DO
  20.       PARSE ARG , from, todir, format
  21.  
  22.       ECHO 'DECODE "'from'", "'todir'", "'format'"'
  23.       RETURN ''
  24.    END
  25.    OTHERWISE
  26. END
  27. RETURN ''
  28.